home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / Development / Emperor_ / Emperor / Projects / AminetSearcher / AminetSearcher.c < prev    next >
Encoding:
C/C++ Source or Header  |  2002-10-28  |  120.8 KB  |  1,780 lines

  1. /* code was generated by Emperor */
  2.  
  3. #define ALL_REACTION_CLASSES
  4. #define ALL_REACTION_MACROS
  5. #include <stdio.h>
  6. #include <stdlib.h>
  7. #include <string.h>
  8. #include <math.h>
  9. #include <clib/alib_protos.h>
  10. #include <clib/asl_protos.h>
  11. #include <clib/dos_protos.h>
  12. #include <clib/exec_protos.h>
  13. #include <clib/gadtools_protos.h>
  14. #include <clib/graphics_protos.h>
  15. #include <clib/intuition_protos.h>
  16. #include <clib/locale_protos.h>
  17. #include <clib/utility_protos.h>
  18. #include <clib/wb_protos.h>
  19. #include <clib/colorwheel_protos.h>
  20. #include <clib/datebrowser_protos.h>
  21. #include <clib/resource_protos.h>
  22. #include <clib/texteditor_protos.h>
  23. #include <gadgets/colorwheel.h>
  24. #include <gadgets/datebrowser.h>
  25. #include <gadgets/gradientslider.h>
  26. #include <gadgets/tapedeck.h>
  27. #include <gadgets/texteditor.h>
  28. #include <proto/texteditor.h>
  29. #include <reaction/reaction.h>
  30. #include <intuition/icclass.h>
  31. #include <intuition/imageclass.h>
  32. #include <intuition/gadgetclass.h>
  33. #include <workbench/startup.h>
  34. #include <wbstartup.h>
  35.  
  36. #define TapeDeckObject   NewObject(NULL, "tapedeck.gadget"
  37. #define TextEditorObject NewObject(TEXTEDITOR_GetClass(), NULL
  38.  
  39. #define LOCALE_WINDOW_TITLE1 GetCatalogStr(Catalog, 0, "AminetSearcher Version 1.5")
  40. #define LOCALE_SCREEN_TITLE1 GetCatalogStr(Catalog, 1, "AminetSearcher Version 1.5   created by Emperor")
  41. #define LOCALE_ICONIFIED_TITLE1 GetCatalogStr(Catalog, 2, "Iconified Program")
  42. #define LOCALE_PATTERN1 GetCatalogStr(Catalog, 3, "Pattern #1")
  43. #define LOCALE_PATTERN2 GetCatalogStr(Catalog, 4, "Pattern #2")
  44. #define LOCALE_PATTERN3 GetCatalogStr(Catalog, 5, "Pattern #3")
  45. #define LOCALE_PATTERN4 GetCatalogStr(Catalog, 6, "Pattern #4")
  46. #define LOCALE_PATTERN5 GetCatalogStr(Catalog, 7, "Pattern #5")
  47. #define LOCALE_ALLCDS GetCatalogStr(Catalog, 8, "all CDs")
  48. #define LOCALE_ONECD GetCatalogStr(Catalog, 9, "one CD")
  49. #define LOCALE_REQUEST_INFO_TITLE GetCatalogStr(Catalog, 10, "Program information")
  50. #define LOCALE_REQUEST_INFO_BODY GetCatalogStr(Catalog, 11, " AminetSearcher was written by Matthias Gietzelt \n AminetSearcher was created with Emperor")
  51. #define LOCALE_REQUEST_INFO_GADGET GetCatalogStr(Catalog, 12, "Okay")
  52. #define LOCALE_REQUEST_QUIT_TITLE GetCatalogStr(Catalog, 13, "Program request")
  53. #define LOCALE_REQUEST_QUIT_BODY GetCatalogStr(Catalog, 14, " Do you really want to quit this program ?")
  54. #define LOCALE_REQUEST_QUIT_GADGET GetCatalogStr(Catalog, 15, "Okay|No")
  55. #define LOCALE_REQUEST_ERROR1_TITLE GetCatalogStr(Catalog, 16, "Program error")
  56. #define LOCALE_REQUEST_ERROR1_BODY GetCatalogStr(Catalog, 17, "An error has been occured: Can't get Aminet-Index !")
  57. #define LOCALE_REQUEST_ERROR1_GADGET GetCatalogStr(Catalog, 18, "Okay")
  58. #define LOCALE_REQUEST_EXTRACT_TITLE GetCatalogStr(Catalog, 19, "AminetSearcher request")
  59. #define LOCALE_REQUEST_EXTRACT_BODY GetCatalogStr(Catalog, 20, " What do you want to do ? ")
  60. #define LOCALE_REQUEST_EXTRACT_GADGET GetCatalogStr(Catalog, 21, "Readme|Extract|Break")
  61. #define LOCALE_REQUEST_NOPATT_TITLE GetCatalogStr(Catalog, 22, "AminetSearcher request")
  62. #define LOCALE_REQUEST_NOPATT_BODY GetCatalogStr(Catalog, 23, " You must set a search-pattern ! ")
  63. #define LOCALE_REQUEST_NOPATT_GADGET GetCatalogStr(Catalog, 24, "Okay")
  64. #define LOCALE_PROJECT GetCatalogStr(Catalog, 25, "Project")
  65. #define LOCALE_MENU_PREFS GetCatalogStr(Catalog, 26, "Prefs")
  66. #define LOCALE_MENU_INFO GetCatalogStr(Catalog, 27, "Info")
  67. #define LOCALE_MENU_QUIT GetCatalogStr(Catalog, 28, "Quit")
  68. #define LOCALE_MENU_EXTRA GetCatalogStr(Catalog, 29, "Extra")
  69. #define LOCALE_MENU_SELECTALL GetCatalogStr(Catalog, 30, "Select all")
  70. #define LOCALE_SELECTNONE GetCatalogStr(Catalog, 31, "Select none")
  71. #define LOCALE_SCAN_IN_LHA GetCatalogStr(Catalog, 32, "scan in LhA")
  72. #define LOCALE_SEARCH GetCatalogStr(Catalog, 33, "Search")
  73. #define LOCALE_BREAK GetCatalogStr(Catalog, 34, "Break")
  74. #define LOCALE_SINGLE_CDs GetCatalogStr(Catalog, 35, "Single CDs")
  75. #define GADHELP_STRING1 GetCatalogStr(Catalog, 36, "Input searchpattern #1")
  76. #define GADHELP_STRING2 GetCatalogStr(Catalog, 37, "Input searchpattern #2")
  77. #define GADHELP_STRING3 GetCatalogStr(Catalog, 38, "Input searchpattern #3")
  78. #define GADHELP_STRING4 GetCatalogStr(Catalog, 39, "Input searchpattern #4")
  79. #define GADHELP_STRING5 GetCatalogStr(Catalog, 40, "Input searchpattern #5")
  80. #define GADHELP_CHECK1 GetCatalogStr(Catalog, 41, "When searching through LhA-files, check directory: biz")
  81. #define GADHELP_CHECK2 GetCatalogStr(Catalog, 42, "When searching through LhA-files, check directory: comm")
  82. #define GADHELP_CHECK3 GetCatalogStr(Catalog, 43, "When searching through LhA-files, check directory: demo")
  83. #define GADHELP_CHECK4 GetCatalogStr(Catalog, 44, "When searching through LhA-files, check directory: dev")
  84. #define GADHELP_CHECK5 GetCatalogStr(Catalog, 45, "When searching through LhA-files, check directory: disk")
  85. #define GADHELP_CHECK6 GetCatalogStr(Catalog, 46, "When searching through LhA-files, check directory: docs")
  86. #define GADHELP_CHECK7 GetCatalogStr(Catalog, 47, "When searching through LhA-files, check directory: game")
  87. #define GADHELP_CHECK8 GetCatalogStr(Catalog, 48, "When searching through LhA-files, check directory: gfx")
  88. #define GADHELP_CHECK9 GetCatalogStr(Catalog, 49, "When searching through LhA-files, check directory: hard")
  89. #define GADHELP_CHECK10 GetCatalogStr(Catalog, 50, "When searching through LhA-files, check directory: misc")
  90. #define GADHELP_CHECK11 GetCatalogStr(Catalog, 51, "When searching through LhA-files, check directory: mods")
  91. #define GADHELP_CHECK12 GetCatalogStr(Catalog, 52, "When searching through LhA-files, check directory: mus")
  92. #define GADHELP_CHECK13 GetCatalogStr(Catalog, 53, "When searching through LhA-files, check directory: pix")
  93. #define GADHELP_CHECK14 GetCatalogStr(Catalog, 54, "When searching through LhA-files, check directory: text")
  94. #define GADHELP_CHECK15 GetCatalogStr(Catalog, 55, "When searching through LhA-files, check directory: util")
  95. #define GADHELP_CHECK16 GetCatalogStr(Catalog, 56, "Search trough LhA-files after given patterns")
  96. #define GADHELP_CHECK17 GetCatalogStr(Catalog, 57, "Aminetset or single Aminets")
  97. #define GADHELP_CHOOSER GetCatalogStr(Catalog, 58, "Choose searching through all or just one Aminet")
  98. #define GADHELP_BUTTON1 GetCatalogStr(Catalog, 59, "Start searching")
  99. #define GADHELP_BUTTON2 GetCatalogStr(Catalog, 60, "Break searching")
  100. #define GADHELP_LISTBROWSER GetCatalogStr(Catalog, 61, "List of founded files")
  101. #define GADHELP_FUELGAUGE1 GetCatalogStr(Catalog, 62, "Percent indicator #1 of searchposition")
  102. #define GADHELP_FUELGAUGE2 GetCatalogStr(Catalog, 63, "Percent indicator #2 of searchposition")
  103. #define GADHELP_STRING6 GetCatalogStr(Catalog, 64, "GadgetHelp and statusoutput-gadget")
  104.  
  105. #define Layout1 Gadget1[1]
  106. #define Layout2 Gadget1[2]
  107. #define Layout3 Gadget1[3]
  108. #define String1 Gadget1[4]
  109. #define Label1 Gadget1[5]
  110. #define String2 Gadget1[6]
  111. #define Label2 Gadget1[7]
  112. #define String3 Gadget1[8]
  113. #define Label3 Gadget1[9]
  114. #define String4 Gadget1[10]
  115. #define Label4 Gadget1[11]
  116. #define String5 Gadget1[12]
  117. #define Label5 Gadget1[13]
  118. #define Layout4 Gadget1[14]
  119. #define Layout5 Gadget1[15]
  120. #define Checkbox1 Gadget1[16]
  121. #define Checkbox2 Gadget1[17]
  122. #define Checkbox3 Gadget1[18]
  123. #define Checkbox4 Gadget1[19]
  124. #define Checkbox5 Gadget1[20]
  125. #define Layout6 Gadget1[21]
  126. #define Checkbox6 Gadget1[22]
  127. #define Checkbox7 Gadget1[23]
  128. #define Checkbox8 Gadget1[24]
  129. #define Checkbox9 Gadget1[25]
  130. #define Checkbox10 Gadget1[26]
  131. #define Layout7 Gadget1[27]
  132. #define Checkbox11 Gadget1[28]
  133. #define Checkbox12 Gadget1[29]
  134. #define Checkbox13 Gadget1[30]
  135. #define Checkbox14 Gadget1[31]
  136. #define Checkbox15 Gadget1[32]
  137. #define Layout8 Gadget1[33]
  138. #define Checkbox16 Gadget1[34]
  139. #define Checkbox17 Gadget1[35]
  140. #define Space1 Gadget1[36]
  141. #define Chooser1 Gadget1[37]
  142. #define Button1 Gadget1[38]
  143. #define Button2 Gadget1[39]
  144. #define Listbrowser1 Gadget1[40]
  145. #define Fuelgauge1 Gadget1[41]
  146. #define Fuelgauge2 Gadget1[42]
  147. #define String6 Gadget1[43]
  148.  
  149. #define Menu_Project 65504
  150. #define Menu_Info 63488
  151. #define Menu_Quit 63552
  152. #define Menu_Extra 65505
  153. #define Menu_Select_All 63489
  154. #define Menu_Select_None 63521
  155.  
  156. LONG Inforequest1(void);
  157. LONG Quitrequest1(void);
  158. LONG Errorrequest1(void);
  159. LONG Extractrequest1(void);
  160. LONG Nopatternrequest1(void);
  161. void String1_GadgetUp_Event(void);
  162. void String2_GadgetUp_Event(void);
  163. void String3_GadgetUp_Event(void);
  164. void String4_GadgetUp_Event(void);
  165. void String5_GadgetUp_Event(void);
  166. void Checkbox16_GadgetUp_Event(void);
  167. void Checkbox17_GadgetUp_Event(void);
  168. void Chooser1_GadgetUp_Event(void);
  169. void Button1_GadgetUp_Event(void);
  170. void Listbrowser1_GadgetUp_Event(void);
  171. void Menu_Info_MenuPick_Event(void);
  172. void Menu_Quit_MenuPick_Event(void);
  173. void Menu_Select_All_MenuPick_Event(void);
  174. void Menu_Select_None_MenuPick_Event(void);
  175. void Window1_CloseWindow_Event(void);
  176. void Emperor_InitProgram(void);
  177. void Emperor_QuitProgram(void);
  178. void Emperor_AllocChooserNode(struct List *, char **, WORD *);
  179. void Emperor_AllocClicktabNode(struct List *, char **, WORD *);
  180. void Emperor_AllocListbrowserNode(struct List *, char **, WORD *);
  181. void Emperor_AllocRadiobuttonNode(struct List *, char **, WORD *);
  182. void Emperor_AllocListbrowserGadToolsNode(struct List *, char **);
  183. void Emperor_CloseScreen_Screen1(void);
  184. struct Screen *Emperor_OpenScreen_Screen1(void);
  185. void Emperor_CloseWindow_Window1(void);
  186. struct Window *Emperor_OpenWindow_Window1(void);
  187. STRPTR Emperor_GetGadgetAttr(struct Gadget *);
  188. void Emperor_SetGadgetAttr(struct Gadget *, STRPTR);
  189. void Emperor_SetGadgetDisabledAttr(struct Gadget *, BOOL);
  190. ULONG stringlength(STRPTR);
  191. LONG stringtoint(STRPTR);
  192. DOUBLE stringtofloat(STRPTR);
  193. STRPTR inttostring(LONG);
  194.  
  195. const char VERSION[] = "$VER: AminetSearcher 1.6 (15-Jul-2001)";
  196. const char AUTHOR[] = "Matthias Gietzelt";
  197.  
  198. BYTE Emperor_Gadgetkind1[] = { 0, 12, 12, 12, 20, 26, 20, 26, 20, 26, 20, 26, 20, 26, 12, 12, 1, 1, 1, 1, 1, 12, 1, 1, 1, 1, 1, 12, 1, 1, 1, 1, 1, 12, 1, 1, 18, 2, 0, 0, 13, 6, 6, 20, -1 };
  199. char *Emperor_Chooserarrayraw[] = { "one CD", "all CDs", NULL };
  200. WORD Emperor_Chooserarrayattr[] = { 0, 0, 0, 0, 0, 0, 0, 0, -1, -1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, NULL };
  201. char *Emperor_founded_files_listraw[] = { NULL };
  202. WORD Emperor_founded_files_listattr[] = { NULL };
  203.  
  204. struct ColumnInfo ListbrowserColumnInfo[] =
  205. {
  206.     { 100, "String", 0 },
  207.     { 100, "File", 0 },
  208.     { 100, "Dir", 0 },
  209.     { 100, "Length", 0 },
  210.     { 100, "Short", 0 },
  211.     { -1, (STRPTR)~0, -1 }
  212. };
  213.  
  214. struct NewMenu NewMenu[] =
  215. {
  216.     { NM_TITLE, 0, 0, 0, 0, 0 },
  217.     { NM_ITEM, 0, "I", 0, 0, 0 },
  218.     { NM_ITEM, NM_BARLABEL, 0, 0, 0, 0 },
  219.     { NM_ITEM, 0, "Q", 0, 0, 0 },
  220.     { NM_TITLE, 0, 0, 0, 0, 0 },
  221.     { NM_ITEM, 0, "A", 0, 0, 0 },
  222.     { NM_ITEM, 0, "N", 0, 0, 0 },
  223.     { NM_END, 0, 0, 0, 0, 0 }
  224. };
  225.  
  226. struct TextAttr XEN1 =
  227. {
  228.     "XEN.font",
  229.     8,
  230.     0,
  231.     FPF_DISKFONT
  232. };
  233.  
  234. void *VisualInfo1 = NULL;
  235. BOOL os35 = TRUE;
  236. BOOL terminated = FALSE;
  237. ULONG WindowSignals1 = 0L;
  238. Object *WindowObject1 = NULL;
  239. struct Catalog *Catalog = NULL;
  240. struct Gadget *Gadget1[44];
  241. struct IntuiMessage *IntuiMessage = NULL;
  242. struct Library *IntuitionBase = NULL;
  243. struct Library *LocaleBase = NULL;
  244. struct Library *GadToolsBase = NULL;
  245. struct Library *ASLBase = NULL;
  246. struct Library *DOSLibBase = NULL;
  247. struct Library *ResourceBase = NULL;
  248. struct Library *WindowBase = NULL;
  249. struct Library *RequesterBase = NULL;
  250. struct Library *ButtonBase = NULL;
  251. struct Library *CheckBoxBase = NULL;
  252. struct Library *ChooserBase = NULL;
  253. struct Library *ClickTabBase = NULL;
  254. struct Library *ColorWheelBase = NULL;
  255. struct Library *DateBrowserBase = NULL;
  256. struct Library *FuelGaugeBase = NULL;
  257. struct Library *GetFileBase = NULL;
  258. struct Library *GetFontBase = NULL;
  259. struct Library *GetScreenModeBase = NULL;
  260. struct Library *GradientSliderBase = NULL;
  261. struct Library *IntegerBase = NULL;
  262. struct Library *LayoutBase = NULL;
  263. struct Library *ListBrowserBase = NULL;
  264. struct Library *PaletteBase = NULL;
  265. struct Library *RadioButtonBase = NULL;
  266. struct Library *ScrollerBase = NULL;
  267. struct Library *SliderBase = NULL;
  268. struct Library *SpaceBase = NULL;
  269. struct Library *SpeedBarBase = NULL;
  270. struct Library *StringBase = NULL;
  271. struct Library *TapeDeckBase = NULL;
  272. struct Library *TextEditorBase = NULL;
  273. struct Library *BevelBase = NULL;
  274. struct Library *BitMapBase = NULL;
  275. struct Library *GlyphBase = NULL;
  276. struct Library *LabelBase = NULL;
  277. struct List Emperor_Chooser_Chooserarray;
  278. struct List Emperor_Clicktab_Chooserarray;
  279. struct List Emperor_Listbrowser_Chooserarray;
  280. struct List Emperor_Radiobutton_Chooserarray;
  281. struct List Emperor_Listbrowser_GadTools_Chooserarray;
  282. struct List Emperor_Chooser_founded_files_list;
  283. struct List Emperor_Clicktab_founded_files_list;
  284. struct List Emperor_Listbrowser_founded_files_list;
  285. struct List Emperor_Radiobutton_founded_files_list;
  286. struct List Emperor_Listbrowser_GadTools_founded_files_list;
  287. struct Menu *Menu = NULL;
  288. struct MsgPort *AppPort = NULL;
  289. struct MsgPort *MsgPort = NULL;
  290. struct Screen *Screen1 = NULL;
  291. struct Window *Window1 = NULL;
  292.  
  293. BOOL in_lha;
  294. BOOL all_or_one_cd;
  295. BOOL single;
  296. LONG winbuff;
  297. LONG entryzahl;
  298. LONG filezahl;
  299. LONG Seconds;
  300. LONG Micros;
  301.  
  302. void main(void)
  303. {
  304.     ULONG Emperor_Code = 0L;
  305.     ULONG Emperor_Input = 0L;
  306.     ULONG Emperor_Micros = 0L;
  307.     ULONG Emperor_Seconds = 0L;
  308.     struct Gadget *Emperor_GadgetMessage = NULL;
  309.     Emperor_InitProgram();
  310.     Emperor_OpenWindow_Window1();
  311.     while(!terminated)
  312.     {
  313.         Wait(WindowSignals1);
  314.         while((Emperor_Input = RA_HandleInput(WindowObject1, &Emperor_Code)) != WMHI_LASTMSG)
  315.         {
  316.             switch(Emperor_Input & WMHI_CLASSMASK)
  317.             {
  318.                 case WMHI_GADGETUP:
  319.                     switch(Emperor_Input & WMHI_GADGETMASK)
  320.                     {
  321.                         case 3: String1_GadgetUp_Event(); break;
  322.                         case 5: String2_GadgetUp_Event(); break;
  323.                         case 7: String3_GadgetUp_Event(); break;
  324.                         case 9: String4_GadgetUp_Event(); break;
  325.                         case 11: String5_GadgetUp_Event(); break;
  326.                         case 33: Checkbox16_GadgetUp_Event(); break;
  327.                         case 34: Checkbox17_GadgetUp_Event(); break;
  328.                         case 36: Chooser1_GadgetUp_Event(); break;
  329.                         case 37: Button1_GadgetUp_Event(); break;
  330.                         case 39: Listbrowser1_GadgetUp_Event(); break;
  331.                         default: break;
  332.                     }
  333.                     break;
  334.                 case WMHI_GADGETHELP:
  335.                     if(((Emperor_Input & WMHI_GADGETMASK) < 43) && (Emperor_Gadgetkind1[(Emperor_Input & WMHI_GADGETMASK) + 1] != -1) && (Emperor_Gadgetkind1[(Emperor_Input & WMHI_GADGETMASK) + 1] < 23)) Emperor_SetGadgetAttr(String6, (STRPTR) Gadget1[(Emperor_Input & WMHI_GADGETMASK) + 1]->UserData);
  336.                     switch(Emperor_Input & WMHI_GADGETMASK)
  337.                     {
  338.                         default: break;
  339.                     }
  340.                     break;
  341.                 case WMHI_MENUPICK:
  342.                     switch(Emperor_Input & WMHI_MENUMASK)
  343.                     {
  344.                         case Menu_Info: Menu_Info_MenuPick_Event(); break;
  345.                         case Menu_Quit: Menu_Quit_MenuPick_Event(); break;
  346.                         case Menu_Select_All: Menu_Select_All_MenuPick_Event(); break;
  347.                         case Menu_Select_None: Menu_Select_None_MenuPick_Event(); break;
  348.                         default: break;
  349.                     }
  350.                     break;
  351.                 case WMHI_MENUHELP:
  352.                     switch(Emperor_Input & WMHI_MENUMASK)
  353.                     {
  354.                         default: break;
  355.                     }
  356.                     break;
  357.                 case WMHI_CLOSEWINDOW:
  358.                     Window1_CloseWindow_Event();
  359.                     break;
  360.                 case WMHI_ICONIFY:
  361.                     break;
  362.                 case WMHI_UNICONIFY:
  363.                     break;
  364.                 case WMHI_ACTIVE:
  365.                     break;
  366.                 case WMHI_INACTIVE:
  367.                     break;
  368.                 case WMHI_RAWKEY:
  369.                     break;
  370.                 case WMHI_VANILLAKEY:
  371.                     break;
  372.                 case WMHI_MOUSEBUTTONS:
  373.                     break;
  374.                 case WMHI_MOUSEMOVE:
  375.                     break;
  376.                 case WMHI_NEWSIZE:
  377.                     break;
  378.                 case WMHI_CHANGEWINDOW:
  379.                     break;
  380.                 case WMHI_DISPOSEDWINDOW:
  381.                     break;
  382.                 case WMHI_INTUITICK:
  383.                     break;
  384.             }
  385.         }
  386.     }
  387.     Emperor_QuitProgram();
  388. }
  389.  
  390. void wbmain(struct WBStartup *Emperor_ArgMsg)
  391. {
  392.     main();
  393. }
  394.  
  395. LONG Inforequest1(void)
  396. {
  397.     struct EasyStruct EmperorRequest_Inforequest1;
  398.  
  399.     EmperorRequest_Inforequest1.es_StructSize = sizeof(struct EasyStruct);
  400.     EmperorRequest_Inforequest1.es_Flags = 0L;
  401.     EmperorRequest_Inforequest1.es_Title = (UBYTE *) LOCALE_REQUEST_INFO_TITLE;
  402.     EmperorRequest_Inforequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_INFO_BODY;
  403.     EmperorRequest_Inforequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_INFO_GADGET;
  404.     return(EasyRequest(Window1, &EmperorRequest_Inforequest1, NULL, NULL));
  405. }
  406.  
  407. LONG Quitrequest1(void)
  408. {
  409.     struct EasyStruct EmperorRequest_Quitrequest1;
  410.  
  411.     EmperorRequest_Quitrequest1.es_StructSize = sizeof(struct EasyStruct);
  412.     EmperorRequest_Quitrequest1.es_Flags = 0L;
  413.     EmperorRequest_Quitrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_QUIT_TITLE;
  414.     EmperorRequest_Quitrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_QUIT_BODY;
  415.     EmperorRequest_Quitrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_QUIT_GADGET;
  416.     return(EasyRequest(Window1, &EmperorRequest_Quitrequest1, NULL, NULL));
  417. }
  418.  
  419. LONG Errorrequest1(void)
  420. {
  421.     struct EasyStruct EmperorRequest_Errorrequest1;
  422.  
  423.     EmperorRequest_Errorrequest1.es_StructSize = sizeof(struct EasyStruct);
  424.     EmperorRequest_Errorrequest1.es_Flags = 0L;
  425.     EmperorRequest_Errorrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_ERROR1_TITLE;
  426.     EmperorRequest_Errorrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_ERROR1_BODY;
  427.     EmperorRequest_Errorrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_ERROR1_GADGET;
  428.     return(EasyRequest(Window1, &EmperorRequest_Errorrequest1, NULL, NULL));
  429. }
  430.  
  431. LONG Extractrequest1(void)
  432. {
  433.     struct EasyStruct EmperorRequest_Extractrequest1;
  434.  
  435.     EmperorRequest_Extractrequest1.es_StructSize = sizeof(struct EasyStruct);
  436.     EmperorRequest_Extractrequest1.es_Flags = 0L;
  437.     EmperorRequest_Extractrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_EXTRACT_TITLE;
  438.     EmperorRequest_Extractrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_EXTRACT_BODY;
  439.     EmperorRequest_Extractrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_EXTRACT_GADGET;
  440.     return(EasyRequest(Window1, &EmperorRequest_Extractrequest1, NULL, NULL));
  441. }
  442.  
  443. LONG Nopatternrequest1(void)
  444. {
  445.     struct EasyStruct EmperorRequest_Nopatternrequest1;
  446.  
  447.     EmperorRequest_Nopatternrequest1.es_StructSize = sizeof(struct EasyStruct);
  448.     EmperorRequest_Nopatternrequest1.es_Flags = 0L;
  449.     EmperorRequest_Nopatternrequest1.es_Title = (UBYTE *) LOCALE_REQUEST_NOPATT_TITLE;
  450.     EmperorRequest_Nopatternrequest1.es_TextFormat = (UBYTE *) LOCALE_REQUEST_NOPATT_BODY;
  451.     EmperorRequest_Nopatternrequest1.es_GadgetFormat = (UBYTE *) LOCALE_REQUEST_NOPATT_GADGET;
  452.     return(EasyRequest(Window1, &EmperorRequest_Nopatternrequest1, NULL, NULL));
  453. }
  454.  
  455. void Emperor_InitProgram(void)
  456. {
  457.     UWORD Emperor_InitVar = 0;
  458.     char Emperor_OccuredError[50], Emperor_ExceptionString[300];
  459.     struct EasyStruct EmperorRequest_InitializationErrorRequest;
  460.  
  461.     IntuitionBase = OpenLibrary("intuition.library", 39L);
  462.     if(!IntuitionBase)
  463.     {
  464.         Emperor_InitVar = 1;
  465.         strcpy(Emperor_OccuredError, "intuition.library");
  466.     }
  467.     LocaleBase = OpenLibrary("locale.library", 39L);
  468.     if(!LocaleBase)
  469.     {
  470.         Emperor_InitVar = 1;
  471.         strcpy(Emperor_OccuredError, "locale.library");
  472.     }
  473.     GadToolsBase = OpenLibrary("gadtools.library", 39L);
  474.     if(!GadToolsBase)
  475.     {
  476.         Emperor_InitVar = 1;
  477.         strcpy(Emperor_OccuredError, "gadtools.library");
  478.     }
  479.     ASLBase = OpenLibrary("asl.library", 39L);
  480.     if(!ASLBase)
  481.     {
  482.         Emperor_InitVar = 1;
  483.         strcpy(Emperor_OccuredError, "asl.library");
  484.     }
  485.     DOSLibBase = OpenLibrary("dos.library", 39L);
  486.     if(!DOSLibBase)
  487.     {
  488.         Emperor_InitVar = 1;
  489.         strcpy(Emperor_OccuredError, "dos.library");
  490.     }
  491.     ResourceBase = OpenLibrary("resource.library", 44L);
  492.     if(!ResourceBase)
  493.     {
  494.         os35 = FALSE;
  495.         strcpy(Emperor_OccuredError, "resource.library");
  496.     }
  497.     WindowBase = OpenLibrary("window.class", 44L);
  498.     if(!WindowBase)
  499.     {
  500.         os35 = FALSE;
  501.         strcpy(Emperor_OccuredError, "window.class");
  502.     }
  503.     RequesterBase = OpenLibrary("requester.class", 42L);
  504.     if(!RequesterBase)
  505.     {
  506.         os35 = FALSE;
  507.         strcpy(Emperor_OccuredError, "requester.class");
  508.     }
  509.     ButtonBase = OpenLibrary("gadgets/button.gadget", 44L);
  510.     if(!ButtonBase)
  511.     {
  512.         os35 = FALSE;
  513.         strcpy(Emperor_OccuredError, "gadgets/button.gadget");
  514.     }
  515.     CheckBoxBase = OpenLibrary("gadgets/checkbox.gadget", 44L);
  516.     if(!CheckBoxBase)
  517.     {
  518.         os35 = FALSE;
  519.         strcpy(Emperor_OccuredError, "gadgets/checkbox.gadget");
  520.     }
  521.     ChooserBase = OpenLibrary("gadgets/chooser.gadget", 44L);
  522.     if(!ChooserBase)
  523.     {
  524.         os35 = FALSE;
  525.         strcpy(Emperor_OccuredError, "gadgets/chooser.gadget");
  526.     }
  527.     ClickTabBase = OpenLibrary("gadgets/clicktab.gadget", 44L);
  528.     if(!ClickTabBase)
  529.     {
  530.         os35 = FALSE;
  531.         strcpy(Emperor_OccuredError, "gadgets/clicktab.gadget");
  532.     }
  533.     ColorWheelBase = OpenLibrary("gadgets/colorwheel.gadget", 44L);
  534.     if(!ColorWheelBase)
  535.     {
  536.         os35 = FALSE;
  537.         strcpy(Emperor_OccuredError, "gadgets/colorwheel.gadget");
  538.     }
  539.     DateBrowserBase = OpenLibrary("gadgets/datebrowser.gadget", 44L);
  540.     if(!DateBrowserBase)
  541.     {
  542.         os35 = FALSE;
  543.         strcpy(Emperor_OccuredError, "gadgets/datebrowser.gadget");
  544.     }
  545.     FuelGaugeBase = OpenLibrary("gadgets/fuelgauge.gadget", 44L);
  546.     if(!FuelGaugeBase)
  547.     {
  548.         os35 = FALSE;
  549.         strcpy(Emperor_OccuredError, "gadgets/fuelgauge.gadget");
  550.     }
  551.     GetFileBase = OpenLibrary("gadgets/getfile.gadget", 44L);
  552.     if(!GetFileBase)
  553.     {
  554.         os35 = FALSE;
  555.         strcpy(Emperor_OccuredError, "gadgets/getfile.gadget");
  556.     }
  557.     GetFontBase = OpenLibrary("gadgets/getfont.gadget", 44L);
  558.     if(!GetFontBase)
  559.     {
  560.         os35 = FALSE;
  561.         strcpy(Emperor_OccuredError, "gadgets/getfont.gadget");
  562.     }
  563.     GetScreenModeBase = OpenLibrary("gadgets/getscreenmode.gadget", 44L);
  564.     if(!GetScreenModeBase)
  565.     {
  566.         os35 = FALSE;
  567.         strcpy(Emperor_OccuredError, "gadgets/getscreenmode.gadget");
  568.     }
  569.     GradientSliderBase = OpenLibrary("gadgets/gradientslider.gadget", 44L);
  570.     if(!GradientSliderBase)
  571.     {
  572.         os35 = FALSE;
  573.         strcpy(Emperor_OccuredError, "gadgets/gradientslider.gadget");
  574.     }
  575.     IntegerBase = OpenLibrary("gadgets/integer.gadget", 44L);
  576.     if(!IntegerBase)
  577.     {
  578.         os35 = FALSE;
  579.         strcpy(Emperor_OccuredError, "gadgets/integer.gadget");
  580.     }
  581.     LayoutBase = OpenLibrary("gadgets/layout.gadget", 44L);
  582.     if(!LayoutBase)
  583.     {
  584.         os35 = FALSE;
  585.         strcpy(Emperor_OccuredError, "gadgets/layout.gadget");
  586.     }
  587.     ListBrowserBase = OpenLibrary("gadgets/listbrowser.gadget", 44L);
  588.     if(!ListBrowserBase)
  589.     {
  590.         os35 = FALSE;
  591.         strcpy(Emperor_OccuredError, "gadgets/listbrowser.gadget");
  592.     }
  593.     PaletteBase = OpenLibrary("gadgets/palette.gadget", 44L);
  594.     if(!PaletteBase)
  595.     {
  596.         os35 = FALSE;
  597.         strcpy(Emperor_OccuredError, "gadgets/palette.gadget");
  598.     }
  599.     RadioButtonBase = OpenLibrary("gadgets/radiobutton.gadget", 44L);
  600.     if(!RadioButtonBase)
  601.     {
  602.         os35 = FALSE;
  603.         strcpy(Emperor_OccuredError, "gadgets/radiobutton.gadget");
  604.     }
  605.     ScrollerBase = OpenLibrary("gadgets/scroller.gadget", 44L);
  606.     if(!ScrollerBase)
  607.     {
  608.         os35 = FALSE;
  609.         strcpy(Emperor_OccuredError, "gadgets/scroller.gadget");
  610.     }
  611.     SliderBase = OpenLibrary("gadgets/slider.gadget", 44L);
  612.     if(!SliderBase)
  613.     {
  614.         os35 = FALSE;
  615.         strcpy(Emperor_OccuredError, "gadgets/slider.gadget");
  616.     }
  617.     SpaceBase = OpenLibrary("gadgets/space.gadget", 44L);
  618.     if(!SpaceBase)
  619.     {
  620.         os35 = FALSE;
  621.         strcpy(Emperor_OccuredError, "gadgets/space.gadget");
  622.     }
  623.     SpeedBarBase = OpenLibrary("gadgets/speedbar.gadget", 44L);
  624.     if(!SpeedBarBase)
  625.     {
  626.         os35 = FALSE;
  627.         strcpy(Emperor_OccuredError, "gadgets/speedbar.gadget");
  628.     }
  629.     StringBase = OpenLibrary("gadgets/string.gadget", 44L);
  630.     if(!StringBase)
  631.     {
  632.         os35 = FALSE;
  633.         strcpy(Emperor_OccuredError, "gadgets/string.gadget");
  634.     }
  635.     TapeDeckBase = OpenLibrary("gadgets/tapedeck.gadget", 40L);
  636.     if(!TapeDeckBase)
  637.     {
  638.         os35 = FALSE;
  639.         strcpy(Emperor_OccuredError, "gadgets/tapedeck.gadget");
  640.     }
  641.     TextEditorBase = OpenLibrary("gadgets/texteditor.gadget", 15L);
  642.     if(!TextEditorBase)
  643.     {
  644.         os35 = FALSE;
  645.         strcpy(Emperor_OccuredError, "gadgets/texteditor.gadget");
  646.     }
  647.     BevelBase = OpenLibrary("images/bevel.image", 44L);
  648.     if(!BevelBase)
  649.     {
  650.         os35 = FALSE;
  651.         strcpy(Emperor_OccuredError, "images/bevel.image");
  652.     }
  653.     BitMapBase = OpenLibrary("images/bitmap.image", 44L);
  654.     if(!BitMapBase)
  655.     {
  656.         os35 = FALSE;
  657.         strcpy(Emperor_OccuredError, "images/bitmap.image");
  658.     }
  659.     GlyphBase = OpenLibrary("images/glyph.image", 44L);
  660.     if(!GlyphBase)
  661.     {
  662.         os35 = FALSE;
  663.         strcpy(Emperor_OccuredError, "images/glyph.image");
  664.     }
  665.     LabelBase = OpenLibrary("images/label.image", 44L);
  666.     if(!LabelBase)
  667.     {
  668.         os35 = FALSE;
  669.         strcpy(Emperor_OccuredError, "images/label.image");
  670.     }
  671.     Catalog = OpenCatalogA(NULL, "AminetSearcher.catalog", NULL);
  672.  
  673.     Emperor_OpenScreen_Screen1();
  674.     VisualInfo1 = GetVisualInfo(Screen1, TAG_DONE);
  675.     if(!VisualInfo1) Emperor_InitVar = 5;
  676.     else
  677.     {
  678.         NewMenu[0].nm_Label = LOCALE_PROJECT;
  679.         NewMenu[1].nm_Label = LOCALE_MENU_INFO;
  680.         NewMenu[2].nm_Label = NM_BARLABEL;
  681.         NewMenu[3].nm_Label = LOCALE_MENU_QUIT;
  682.         NewMenu[4].nm_Label = LOCALE_MENU_EXTRA;
  683.         NewMenu[5].nm_Label = LOCALE_MENU_SELECTALL;
  684.         NewMenu[6].nm_Label = LOCALE_SELECTNONE;
  685.         Menu = CreateMenus(NewMenu, GTMN_FullMenu, TRUE, TAG_DONE);
  686.         if(!Menu) Emperor_InitVar = 6;
  687.         else
  688.         {
  689.             LayoutMenus(Menu, VisualInfo1, GTMN_FrontPen, 0, TAG_DONE);
  690.  
  691.             AppPort = CreateMsgPort();
  692.             if(!AppPort) Emperor_InitVar = 7;
  693.  
  694.             MsgPort = CreatePort("AminetSearcher_Port", 0);
  695.             if(!MsgPort) Emperor_InitVar = 7;
  696.         }
  697.     }
  698.     strcpy(Emperor_Chooserarrayraw[0], LOCALE_ONECD);
  699.     strcpy(Emperor_Chooserarrayraw[1], LOCALE_ALLCDS);
  700.     if(os35)
  701.     {
  702.         Emperor_AllocChooserNode(&Emperor_Chooser_Chooserarray, Emperor_Chooserarrayraw, Emperor_Chooserarrayattr);
  703.         Emperor_AllocClicktabNode(&Emperor_Clicktab_Chooserarray, Emperor_Chooserarrayraw, Emperor_Chooserarrayattr);
  704.         Emperor_AllocListbrowserNode(&Emperor_Listbrowser_Chooserarray, Emperor_Chooserarrayraw, Emperor_Chooserarrayattr);
  705.         Emperor_AllocRadiobuttonNode(&Emperor_Radiobutton_Chooserarray, Emperor_Chooserarrayraw, Emperor_Chooserarrayattr);
  706.     }
  707.     Emperor_AllocListbrowserGadToolsNode(&Emperor_Listbrowser_GadTools_Chooserarray, Emperor_Chooserarrayraw);
  708.     if(os35)
  709.     {
  710.         Emperor_AllocChooserNode(&Emperor_Chooser_founded_files_list, Emperor_founded_files_listraw, Emperor_founded_files_listattr);
  711.         Emperor_AllocClicktabNode(&Emperor_Clicktab_founded_files_list, Emperor_founded_files_listraw, Emperor_founded_files_listattr);
  712.         Emperor_AllocListbrowserNode(&Emperor_Listbrowser_founded_files_list, Emperor_founded_files_listraw, Emperor_founded_files_listattr);
  713.         Emperor_AllocRadiobuttonNode(&Emperor_Radiobutton_founded_files_list, Emperor_founded_files_listraw, Emperor_founded_files_listattr);
  714.     }
  715.     Emperor_AllocListbrowserGadToolsNode(&Emperor_Listbrowser_GadTools_founded_files_list, Emperor_founded_files_listraw);
  716.     if((os35) && (!Emperor_InitVar))
  717.     {
  718.         WindowObject1 = (Object *) WindowObject,
  719.                         WA_Left, 0,
  720.                         WA_Top, 17,
  721.                         WA_Width, 400,
  722.                         WA_Height, 300,
  723.                         WA_SizeGadget, TRUE,
  724.                         WA_DragBar, TRUE,
  725.                         WA_DepthGadget, TRUE,
  726.                         WA_CloseGadget, TRUE,
  727.                         WA_Activate, TRUE,
  728.                         WA_AutoAdjust, TRUE,
  729.                         WA_IDCMP, IDCMP_GADGETDOWN | IDCMP_GADGETUP | IDCMP_GADGETHELP | IDCMP_MENUPICK | IDCMP_MENUHELP | IDCMP_CLOSEWINDOW | IDCMP_ACTIVEWINDOW | IDCMP_INACTIVEWINDOW | IDCMP_RAWKEY | IDCMP_VANILLAKEY | IDCMP_MOUSEBUTTONS | IDCMP_MOUSEMOVE | IDCMP_NEWSIZE | IDCMP_CHANGEWINDOW | IDCMP_SIZEVERIFY | IDCMP_REFRESHWINDOW | IDCMP_INTUITICKS,
  730.                         WA_Title, LOCALE_WINDOW_TITLE1,
  731.                         WA_ScreenTitle, LOCALE_SCREEN_TITLE1,
  732.                         WA_PubScreen, Screen1,
  733.                         WINDOW_GadgetHelp, TRUE,
  734.                         WINDOW_IconifyGadget, FALSE,
  735.                         WINDOW_IconTitle, LOCALE_ICONIFIED_TITLE1,
  736.                         WINDOW_AppPort, AppPort,
  737.                         WINDOW_ParentGroup, (Object *) Gadget1[0] = (Object *) VGroupObject,
  738.                                             LAYOUT_SpaceOuter, TRUE,
  739.                                             LAYOUT_DeferLayout, TRUE,
  740.                                             LAYOUT_AddChild, (Object *) Gadget1[1] = (Object *) LayoutObject,
  741.                                                              GA_ID, 0,
  742.                                                              GA_RelVerify, TRUE,
  743.                                                              GA_GadgetHelp, TRUE,
  744.                                                              GA_UserData, "",
  745.                                                              LAYOUT_Label, "",
  746.                                                              LAYOUT_Orientation, 1,
  747.                                                              LAYOUT_HorizAlignment, LALIGN_LEFT,
  748.                                                              LAYOUT_VertAlignment, LALIGN_TOP,
  749.                                                              LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  750.                                                              LAYOUT_BevelState, IDS_NORMAL,
  751.                                                              LAYOUT_BevelStyle, 4,
  752.                                                              LAYOUT_AddChild, (Object *) Gadget1[2] = (Object *) LayoutObject,
  753.                                                                               GA_ID, 1,
  754.                                                                               GA_RelVerify, TRUE,
  755.                                                                               GA_GadgetHelp, TRUE,
  756.                                                                               GA_UserData, "",
  757.                                                                               LAYOUT_Label, "",
  758.                                                                               LAYOUT_Orientation, 0,
  759.                                                                               LAYOUT_HorizAlignment, LALIGN_LEFT,
  760.                                                                               LAYOUT_VertAlignment, LALIGN_TOP,
  761.                                                                               LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  762.                                                                               LAYOUT_BevelState, IDS_NORMAL,
  763.                                                                               LAYOUT_BevelStyle, 4,
  764.                                                                               LAYOUT_AddChild, (Object *) Gadget1[3] = (Object *) LayoutObject,
  765.                                                                                                GA_ID, 2,
  766.                                                                                                GA_RelVerify, TRUE,
  767.                                                                                                GA_GadgetHelp, TRUE,
  768.                                                                                                GA_UserData, "",
  769.                                                                                                LAYOUT_Label, "",
  770.                                                                                                LAYOUT_Orientation, 1,
  771.                                                                                                LAYOUT_HorizAlignment, LALIGN_LEFT,
  772.                                                                                                LAYOUT_VertAlignment, LALIGN_TOP,
  773.                                                                                                LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  774.                                                                                                LAYOUT_BevelState, IDS_NORMAL,
  775.                                                                                                LAYOUT_BevelStyle, 4,
  776.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[4] = (Object *) StringObject,
  777.                                                                                                                 GA_ID, 3,
  778.                                                                                                                 GA_RelVerify, TRUE,
  779.                                                                                                                 GA_GadgetHelp, TRUE,
  780.                                                                                                                 GA_TabCycle, TRUE,
  781.                                                                                                                 GA_UserData, GADHELP_STRING1,
  782.                                                                                                                 STRINGA_TextVal, "",
  783.                                                                                                                 STRINGA_MaxChars, 30,
  784.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  785.                                                                                                                 STRINGA_MinVisible, 10,
  786.                                                                                                End,
  787.                                                                                                CHILD_Label, (Object *) Gadget1[5] = (Object *) LabelObject,
  788.                                                                                                                 LABEL_Justification, 0,
  789.                                                                                                                 LABEL_Text, LOCALE_PATTERN1,
  790.                                                                                                End,
  791.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[6] = (Object *) StringObject,
  792.                                                                                                                 GA_ID, 5,
  793.                                                                                                                 GA_RelVerify, TRUE,
  794.                                                                                                                 GA_GadgetHelp, TRUE,
  795.                                                                                                                 GA_TabCycle, TRUE,
  796.                                                                                                                 GA_UserData, GADHELP_STRING2,
  797.                                                                                                                 STRINGA_TextVal, "",
  798.                                                                                                                 STRINGA_MaxChars, 30,
  799.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  800.                                                                                                                 STRINGA_MinVisible, 10,
  801.                                                                                                End,
  802.                                                                                                CHILD_Label, (Object *) Gadget1[7] = (Object *) LabelObject,
  803.                                                                                                                 LABEL_Justification, 0,
  804.                                                                                                                 LABEL_Text, LOCALE_PATTERN2,
  805.                                                                                                End,
  806.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[8] = (Object *) StringObject,
  807.                                                                                                                 GA_ID, 7,
  808.                                                                                                                 GA_RelVerify, TRUE,
  809.                                                                                                                 GA_GadgetHelp, TRUE,
  810.                                                                                                                 GA_TabCycle, TRUE,
  811.                                                                                                                 GA_UserData, GADHELP_STRING3,
  812.                                                                                                                 STRINGA_TextVal, "",
  813.                                                                                                                 STRINGA_MaxChars, 30,
  814.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  815.                                                                                                                 STRINGA_MinVisible, 10,
  816.                                                                                                End,
  817.                                                                                                CHILD_Label, (Object *) Gadget1[9] = (Object *) LabelObject,
  818.                                                                                                                 LABEL_Justification, 0,
  819.                                                                                                                 LABEL_Text, LOCALE_PATTERN3,
  820.                                                                                                End,
  821.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[10] = (Object *) StringObject,
  822.                                                                                                                 GA_ID, 9,
  823.                                                                                                                 GA_RelVerify, TRUE,
  824.                                                                                                                 GA_GadgetHelp, TRUE,
  825.                                                                                                                 GA_TabCycle, TRUE,
  826.                                                                                                                 GA_UserData, GADHELP_STRING4,
  827.                                                                                                                 STRINGA_TextVal, "",
  828.                                                                                                                 STRINGA_MaxChars, 30,
  829.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  830.                                                                                                                 STRINGA_MinVisible, 10,
  831.                                                                                                End,
  832.                                                                                                CHILD_Label, (Object *) Gadget1[11] = (Object *) LabelObject,
  833.                                                                                                                 LABEL_Justification, 0,
  834.                                                                                                                 LABEL_Text, LOCALE_PATTERN4,
  835.                                                                                                End,
  836.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[12] = (Object *) StringObject,
  837.                                                                                                                 GA_ID, 11,
  838.                                                                                                                 GA_RelVerify, TRUE,
  839.                                                                                                                 GA_GadgetHelp, TRUE,
  840.                                                                                                                 GA_TabCycle, TRUE,
  841.                                                                                                                 GA_UserData, GADHELP_STRING5,
  842.                                                                                                                 STRINGA_TextVal, "",
  843.                                                                                                                 STRINGA_MaxChars, 30,
  844.                                                                                                                 STRINGA_Justification, GACT_STRINGLEFT,
  845.                                                                                                                 STRINGA_MinVisible, 10,
  846.                                                                                                End,
  847.                                                                                                CHILD_Label, (Object *) Gadget1[13] = (Object *) LabelObject,
  848.                                                                                                                 LABEL_Justification, 0,
  849.                                                                                                                 LABEL_Text, LOCALE_PATTERN5,
  850.                                                                                                End,
  851.                                                                               End,
  852.                                                                               LAYOUT_AddChild, (Object *) Gadget1[14] = (Object *) LayoutObject,
  853.                                                                                                GA_ID, 13,
  854.                                                                                                GA_UserData, "",
  855.                                                                                                LAYOUT_Label, "",
  856.                                                                                                LAYOUT_Orientation, 0,
  857.                                                                                                LAYOUT_HorizAlignment, LALIGN_LEFT,
  858.                                                                                                LAYOUT_VertAlignment, LALIGN_TOP,
  859.                                                                                                LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  860.                                                                                                LAYOUT_BevelState, IDS_NORMAL,
  861.                                                                                                LAYOUT_BevelStyle, 4,
  862.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[15] = (Object *) LayoutObject,
  863.                                                                                                                 GA_ID, 14,
  864.                                                                                                                 GA_UserData, "",
  865.                                                                                                                 LAYOUT_Label, "",
  866.                                                                                                                 LAYOUT_Orientation, 1,
  867.                                                                                                                 LAYOUT_HorizAlignment, LALIGN_LEFT,
  868.                                                                                                                 LAYOUT_VertAlignment, LALIGN_TOP,
  869.                                                                                                                 LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  870.                                                                                                                 LAYOUT_BevelState, IDS_NORMAL,
  871.                                                                                                                 LAYOUT_BevelStyle, 4,
  872.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[16] = (Object *) CheckBoxObject,
  873.                                                                                                                                  GA_ID, 15,
  874.                                                                                                                                  GA_RelVerify, TRUE,
  875.                                                                                                                                  GA_GadgetHelp, TRUE,
  876.                                                                                                                                  GA_Disabled, TRUE,
  877.                                                                                                                                  GA_UserData, GADHELP_CHECK1,
  878.                                                                                                                                  GA_Text, "biz",
  879.                                                                                                                                  CHECKBOX_TextPen, 1,
  880.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  881.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  882.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  883.                                                                                                                 End,
  884.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[17] = (Object *) CheckBoxObject,
  885.                                                                                                                                  GA_ID, 16,
  886.                                                                                                                                  GA_RelVerify, TRUE,
  887.                                                                                                                                  GA_GadgetHelp, TRUE,
  888.                                                                                                                                  GA_Disabled, TRUE,
  889.                                                                                                                                  GA_UserData, GADHELP_CHECK2,
  890.                                                                                                                                  GA_Text, "comm",
  891.                                                                                                                                  CHECKBOX_TextPen, 1,
  892.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  893.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  894.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  895.                                                                                                                 End,
  896.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[18] = (Object *) CheckBoxObject,
  897.                                                                                                                                  GA_ID, 17,
  898.                                                                                                                                  GA_RelVerify, TRUE,
  899.                                                                                                                                  GA_GadgetHelp, TRUE,
  900.                                                                                                                                  GA_Disabled, TRUE,
  901.                                                                                                                                  GA_UserData, GADHELP_CHECK3,
  902.                                                                                                                                  GA_Text, "demo",
  903.                                                                                                                                  CHECKBOX_TextPen, 1,
  904.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  905.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  906.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  907.                                                                                                                 End,
  908.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[19] = (Object *) CheckBoxObject,
  909.                                                                                                                                  GA_ID, 18,
  910.                                                                                                                                  GA_RelVerify, TRUE,
  911.                                                                                                                                  GA_GadgetHelp, TRUE,
  912.                                                                                                                                  GA_Disabled, TRUE,
  913.                                                                                                                                  GA_UserData, GADHELP_CHECK4,
  914.                                                                                                                                  GA_Text, "dev",
  915.                                                                                                                                  CHECKBOX_TextPen, 1,
  916.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  917.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  918.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  919.                                                                                                                 End,
  920.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[20] = (Object *) CheckBoxObject,
  921.                                                                                                                                  GA_ID, 19,
  922.                                                                                                                                  GA_RelVerify, TRUE,
  923.                                                                                                                                  GA_GadgetHelp, TRUE,
  924.                                                                                                                                  GA_Disabled, TRUE,
  925.                                                                                                                                  GA_UserData, GADHELP_CHECK5,
  926.                                                                                                                                  GA_Text, "disk",
  927.                                                                                                                                  CHECKBOX_TextPen, 1,
  928.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  929.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  930.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  931.                                                                                                                 End,
  932.                                                                                                End,
  933.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[21] = (Object *) LayoutObject,
  934.                                                                                                                 GA_ID, 20,
  935.                                                                                                                 GA_UserData, "",
  936.                                                                                                                 LAYOUT_Label, "",
  937.                                                                                                                 LAYOUT_Orientation, 1,
  938.                                                                                                                 LAYOUT_HorizAlignment, LALIGN_LEFT,
  939.                                                                                                                 LAYOUT_VertAlignment, LALIGN_TOP,
  940.                                                                                                                 LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  941.                                                                                                                 LAYOUT_BevelState, IDS_NORMAL,
  942.                                                                                                                 LAYOUT_BevelStyle, 4,
  943.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[22] = (Object *) CheckBoxObject,
  944.                                                                                                                                  GA_ID, 21,
  945.                                                                                                                                  GA_RelVerify, TRUE,
  946.                                                                                                                                  GA_GadgetHelp, TRUE,
  947.                                                                                                                                  GA_Disabled, TRUE,
  948.                                                                                                                                  GA_UserData, GADHELP_CHECK6,
  949.                                                                                                                                  GA_Text, "docs",
  950.                                                                                                                                  CHECKBOX_TextPen, 1,
  951.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  952.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  953.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  954.                                                                                                                 End,
  955.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[23] = (Object *) CheckBoxObject,
  956.                                                                                                                                  GA_ID, 22,
  957.                                                                                                                                  GA_RelVerify, TRUE,
  958.                                                                                                                                  GA_GadgetHelp, TRUE,
  959.                                                                                                                                  GA_Disabled, TRUE,
  960.                                                                                                                                  GA_UserData, GADHELP_CHECK7,
  961.                                                                                                                                  GA_Text, "game",
  962.                                                                                                                                  CHECKBOX_TextPen, 1,
  963.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  964.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  965.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  966.                                                                                                                 End,
  967.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[24] = (Object *) CheckBoxObject,
  968.                                                                                                                                  GA_ID, 23,
  969.                                                                                                                                  GA_RelVerify, TRUE,
  970.                                                                                                                                  GA_GadgetHelp, TRUE,
  971.                                                                                                                                  GA_Disabled, TRUE,
  972.                                                                                                                                  GA_UserData, GADHELP_CHECK8,
  973.                                                                                                                                  GA_Text, "gfx",
  974.                                                                                                                                  CHECKBOX_TextPen, 1,
  975.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  976.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  977.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  978.                                                                                                                 End,
  979.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[25] = (Object *) CheckBoxObject,
  980.                                                                                                                                  GA_ID, 24,
  981.                                                                                                                                  GA_RelVerify, TRUE,
  982.                                                                                                                                  GA_GadgetHelp, TRUE,
  983.                                                                                                                                  GA_Disabled, TRUE,
  984.                                                                                                                                  GA_UserData, GADHELP_CHECK9,
  985.                                                                                                                                  GA_Text, "hard",
  986.                                                                                                                                  CHECKBOX_TextPen, 1,
  987.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  988.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  989.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  990.                                                                                                                 End,
  991.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[26] = (Object *) CheckBoxObject,
  992.                                                                                                                                  GA_ID, 25,
  993.                                                                                                                                  GA_RelVerify, TRUE,
  994.                                                                                                                                  GA_GadgetHelp, TRUE,
  995.                                                                                                                                  GA_Disabled, TRUE,
  996.                                                                                                                                  GA_UserData, GADHELP_CHECK10,
  997.                                                                                                                                  GA_Text, "misc",
  998.                                                                                                                                  CHECKBOX_TextPen, 1,
  999.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1000.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1001.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1002.                                                                                                                 End,
  1003.                                                                                                End,
  1004.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[27] = (Object *) LayoutObject,
  1005.                                                                                                                 GA_ID, 26,
  1006.                                                                                                                 GA_UserData, "",
  1007.                                                                                                                 LAYOUT_Label, "",
  1008.                                                                                                                 LAYOUT_Orientation, 1,
  1009.                                                                                                                 LAYOUT_HorizAlignment, LALIGN_LEFT,
  1010.                                                                                                                 LAYOUT_VertAlignment, LALIGN_TOP,
  1011.                                                                                                                 LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  1012.                                                                                                                 LAYOUT_BevelState, IDS_NORMAL,
  1013.                                                                                                                 LAYOUT_BevelStyle, 4,
  1014.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[28] = (Object *) CheckBoxObject,
  1015.                                                                                                                                  GA_ID, 27,
  1016.                                                                                                                                  GA_RelVerify, TRUE,
  1017.                                                                                                                                  GA_GadgetHelp, TRUE,
  1018.                                                                                                                                  GA_Disabled, TRUE,
  1019.                                                                                                                                  GA_UserData, GADHELP_CHECK11,
  1020.                                                                                                                                  GA_Text, "mods",
  1021.                                                                                                                                  CHECKBOX_TextPen, 1,
  1022.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1023.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1024.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1025.                                                                                                                 End,
  1026.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[29] = (Object *) CheckBoxObject,
  1027.                                                                                                                                  GA_ID, 28,
  1028.                                                                                                                                  GA_RelVerify, TRUE,
  1029.                                                                                                                                  GA_GadgetHelp, TRUE,
  1030.                                                                                                                                  GA_Disabled, TRUE,
  1031.                                                                                                                                  GA_UserData, GADHELP_CHECK12,
  1032.                                                                                                                                  GA_Text, "mus",
  1033.                                                                                                                                  CHECKBOX_TextPen, 1,
  1034.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1035.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1036.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1037.                                                                                                                 End,
  1038.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[30] = (Object *) CheckBoxObject,
  1039.                                                                                                                                  GA_ID, 29,
  1040.                                                                                                                                  GA_RelVerify, TRUE,
  1041.                                                                                                                                  GA_GadgetHelp, TRUE,
  1042.                                                                                                                                  GA_Disabled, TRUE,
  1043.                                                                                                                                  GA_UserData, GADHELP_CHECK13,
  1044.                                                                                                                                  GA_Text, "_pix",
  1045.                                                                                                                                  CHECKBOX_TextPen, 1,
  1046.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1047.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1048.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1049.                                                                                                                 End,
  1050.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[31] = (Object *) CheckBoxObject,
  1051.                                                                                                                                  GA_ID, 30,
  1052.                                                                                                                                  GA_RelVerify, TRUE,
  1053.                                                                                                                                  GA_GadgetHelp, TRUE,
  1054.                                                                                                                                  GA_Disabled, TRUE,
  1055.                                                                                                                                  GA_UserData, GADHELP_CHECK14,
  1056.                                                                                                                                  GA_Text, "text",
  1057.                                                                                                                                  CHECKBOX_TextPen, 1,
  1058.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1059.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1060.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1061.                                                                                                                 End,
  1062.                                                                                                                 LAYOUT_AddChild, (Object *) Gadget1[32] = (Object *) CheckBoxObject,
  1063.                                                                                                                                  GA_ID, 31,
  1064.                                                                                                                                  GA_RelVerify, TRUE,
  1065.                                                                                                                                  GA_GadgetHelp, TRUE,
  1066.                                                                                                                                  GA_Disabled, TRUE,
  1067.                                                                                                                                  GA_UserData, GADHELP_CHECK15,
  1068.                                                                                                                                  GA_Text, "util",
  1069.                                                                                                                                  CHECKBOX_TextPen, 1,
  1070.                                                                                                                                  CHECKBOX_FillTextPen, 1,
  1071.                                                                                                                                  CHECKBOX_BackgroundPen, 0,
  1072.                                                                                                                                  CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1073.                                                                                                                 End,
  1074.                                                                                                End,
  1075.                                                                               End,
  1076.                                                                               LAYOUT_AddChild, (Object *) Gadget1[33] = (Object *) LayoutObject,
  1077.                                                                                                GA_ID, 32,
  1078.                                                                                                GA_UserData, "",
  1079.                                                                                                LAYOUT_Label, "",
  1080.                                                                                                LAYOUT_Orientation, 1,
  1081.                                                                                                LAYOUT_HorizAlignment, LALIGN_LEFT,
  1082.                                                                                                LAYOUT_VertAlignment, LALIGN_TOP,
  1083.                                                                                                LAYOUT_LabelPlace, BVJ_TOP_CENTER,
  1084.                                                                                                LAYOUT_BevelState, IDS_NORMAL,
  1085.                                                                                                LAYOUT_BevelStyle, 4,
  1086.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[34] = (Object *) CheckBoxObject,
  1087.                                                                                                                 GA_ID, 33,
  1088.                                                                                                                 GA_RelVerify, TRUE,
  1089.                                                                                                                 GA_GadgetHelp, TRUE,
  1090.                                                                                                                 GA_UserData, GADHELP_CHECK16,
  1091.                                                                                                                 GA_Text, LOCALE_SCAN_IN_LHA,
  1092.                                                                                                                 CHECKBOX_TextPen, 1,
  1093.                                                                                                                 CHECKBOX_FillTextPen, 1,
  1094.                                                                                                                 CHECKBOX_BackgroundPen, 0,
  1095.                                                                                                                 CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1096.                                                                                                End,
  1097.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[35] = (Object *) CheckBoxObject,
  1098.                                                                                                                 GA_ID, 34,
  1099.                                                                                                                 GA_RelVerify, TRUE,
  1100.                                                                                                                 GA_GadgetHelp, TRUE,
  1101.                                                                                                                 GA_Disabled, TRUE,
  1102.                                                                                                                 GA_UserData, GADHELP_CHECK17,
  1103.                                                                                                                 GA_Text, LOCALE_SINGLE_CDs,
  1104.                                                                                                                 CHECKBOX_TextPen, 1,
  1105.                                                                                                                 CHECKBOX_FillTextPen, 1,
  1106.                                                                                                                 CHECKBOX_BackgroundPen, 0,
  1107.                                                                                                                 CHECKBOX_TextPlace, PLACETEXT_RIGHT,
  1108.                                                                                                End,
  1109.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[36] = (Object *) SpaceObject,
  1110.                                                                                                                 GA_ID, 35,
  1111.                                                                                                                 GA_RelVerify, TRUE,
  1112.                                                                                                                 GA_GadgetHelp, TRUE,
  1113.                                                                                                                 GA_UserData, "",
  1114.                                                                                                                 SPACE_BevelStyle, 4,
  1115.                                                                                                End,
  1116.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[37] = (Object *) ChooserObject,
  1117.                                                                                                                 GA_ID, 36,
  1118.                                                                                                                 GA_RelVerify, TRUE,
  1119.                                                                                                                 GA_GadgetHelp, TRUE,
  1120.                                                                                                                 GA_UserData, GADHELP_CHOOSER,
  1121.                                                                                                                 CHOOSER_Title, "",
  1122.                                                                                                                 CHOOSER_AutoFit, TRUE,
  1123.                                                                                                                 CHOOSER_PopUp, TRUE,
  1124.                                                                                                                 CHOOSER_MaxLabels, 10,
  1125.                                                                                                                 CHOOSER_Offset, 0,
  1126.                                                                                                                 CHOOSER_Selected, -1,
  1127.                                                                                                                 CHOOSER_Labels, (ULONG) &Emperor_Chooser_Chooserarray,
  1128.                                                                                                End,
  1129.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[38] = (Object *) ButtonObject,
  1130.                                                                                                                 GA_ID, 37,
  1131.                                                                                                                 GA_RelVerify, TRUE,
  1132.                                                                                                                 GA_GadgetHelp, TRUE,
  1133.                                                                                                                 GA_UserData, GADHELP_BUTTON1,
  1134.                                                                                                                 GA_Text, LOCALE_SEARCH,
  1135.                                                                                                                 BUTTON_AutoButton, 0,
  1136.                                                                                                                 BUTTON_BevelStyle, 1,
  1137.                                                                                                                 BUTTON_Justification, 1,
  1138.                                                                                                End,
  1139.                                                                                                LAYOUT_AddChild, (Object *) Gadget1[39] = (Object *) ButtonObject,
  1140.                                                                                                                 GA_ID, 38,
  1141.                                                                                                                 GA_RelVerify, TRUE,
  1142.                                                                                                                 GA_GadgetHelp, TRUE,
  1143.                                                                                                                 GA_Disabled, TRUE,
  1144.                                                                                                                 GA_UserData, GADHELP_BUTTON2,
  1145.                                                                                                                 GA_Text, LOCALE_BREAK,
  1146.                                                                                                                 BUTTON_AutoButton, 0,
  1147.                                                                                                                 BUTTON_BevelStyle, 1,
  1148.                                                                                                                 BUTTON_Justification, 1,
  1149.                                                                                                End,
  1150.                                                                               End,
  1151.                                                              End,
  1152.                                                              CHILD_MaxHeight, 35,
  1153.                                                              LAYOUT_AddChild, (Object *) Gadget1[40] = (Object *) ListBrowserObject,
  1154.                                                                               GA_ID, 39,
  1155.                                                                               GA_RelVerify, TRUE,
  1156.                                                                               GA_GadgetHelp, TRUE,
  1157.                                                                               GA_UserData, GADHELP_LISTBROWSER,
  1158.                                                                               GA_TextAttr, &XEN1,
  1159.                                                                               LISTBROWSER_Labels, (ULONG) &Emperor_Listbrowser_founded_files_list,
  1160.                                                                               LISTBROWSER_ColumnInfo, (ULONG) &ListbrowserColumnInfo,
  1161.                                                                               LISTBROWSER_AutoFit, TRUE,
  1162.                                                                               LISTBROWSER_ColumnTitles, TRUE,
  1163.                                                                               LISTBROWSER_ShowSelected, TRUE,
  1164.                                                                               LISTBROWSER_VerticalProp, TRUE,
  1165.                                                                               LISTBROWSER_HorizontalProp, TRUE,
  1166.                                                                               LISTBROWSER_VertSeparators, TRUE,
  1167.                                                              End,
  1168.                                                              LAYOUT_AddChild, (Object *) Gadget1[41] = (Object *) FuelGaugeObject,
  1169.                                                                               GA_ID, 40,
  1170.                                                                               GA_RelVerify, TRUE,
  1171.                                                                               GA_GadgetHelp, TRUE,
  1172.                                                                               GA_UserData, GADHELP_FUELGAUGE1,
  1173.                                                                               FUELGAUGE_Min, 0,
  1174.                                                                               FUELGAUGE_Ticks, 9,
  1175.                                                                               FUELGAUGE_Max, 100,
  1176.                                                                               FUELGAUGE_TickSize, 5,
  1177.                                                                               FUELGAUGE_ShortTicks, 8,
  1178.                                                                               FUELGAUGE_Percent, TRUE,
  1179.                                                                               FUELGAUGE_Justification, 0,
  1180.                                                                               FUELGAUGE_Orientation, 0,
  1181.                                                              End,
  1182.                                                              CHILD_MaxHeight, 35,
  1183.                                                              LAYOUT_AddChild, (Object *) Gadget1[42] = (Object *) FuelGaugeObject,
  1184.                                                                               GA_ID, 41,
  1185.                                                                               GA_RelVerify, TRUE,
  1186.                                                                               GA_GadgetHelp, TRUE,
  1187.                                                                               GA_UserData, GADHELP_FUELGAUGE2,
  1188.                                                                               FUELGAUGE_Min, 0,
  1189.                                                                               FUELGAUGE_Ticks, 9,
  1190.                                                                               FUELGAUGE_Max, 100,
  1191.                                                                               FUELGAUGE_TickSize, 5,
  1192.                                                                               FUELGAUGE_ShortTicks, 8,
  1193.                                                                               FUELGAUGE_Percent, TRUE,
  1194.                                                                               FUELGAUGE_Justification, 0,
  1195.                                                                               FUELGAUGE_Orientation, 0,
  1196.                                                              End,
  1197.                                                              CHILD_MaxHeight, 35,
  1198.                                                              LAYOUT_AddChild, (Object *) Gadget1[43] = (Object *) StringObject,
  1199.                                                                               GA_ID, 42,
  1200.                                                                               GA_RelVerify, TRUE,
  1201.                                                                               GA_GadgetHelp, TRUE,
  1202.                                                                               GA_TabCycle, TRUE,
  1203.                                                                               GA_ReadOnly, TRUE,
  1204.                                                                               GA_UserData, GADHELP_STRING6,
  1205.                                                                               STRINGA_TextVal, "Status: ok",
  1206.                                                                               STRINGA_MaxChars, 100,
  1207.                                                                               STRINGA_Justification, GACT_STRINGLEFT,
  1208.                                                              End,
  1209.                                             End,
  1210.                         EndGroup,
  1211.         EndWindow;
  1212.     }
  1213.  
  1214.     if(Emperor_InitVar)
  1215.     {
  1216.         strcpy(Emperor_ExceptionString, "Error during initialization:\n\n");
  1217.         switch(Emperor_InitVar)
  1218.         {
  1219.             case 1: strcat(Emperor_ExceptionString, "Can't open Amiga-library\n\"");
  1220.                     strcat(Emperor_ExceptionString, Emperor_OccuredError);
  1221.                     strcat(Emperor_ExceptionString, "\"\n\nProbably you haven't got a\ncorrect installed AmigaOS system !");
  1222.                     break;
  1223.             case 5: strcat(Emperor_ExceptionString, "Can't get visualinfo of the screen."); break;
  1224.             case 6: strcat(Emperor_ExceptionString, "Can't create menu."); break;
  1225.             case 7: strcat(Emperor_ExceptionString, "Can't create message-port."); break;
  1226.         }
  1227.         if(Emperor_InitVar >= 5) strcat(Emperor_ExceptionString, "\n\nMaybe there isn't enough memory !");
  1228.         EmperorRequest_InitializationErrorRequest.es_StructSize = sizeof(struct EasyStruct);
  1229.         EmperorRequest_InitializationErrorRequest.es_Flags = 0L;
  1230.         EmperorRequest_InitializationErrorRequest.es_Title = (UBYTE *) "Program error";
  1231.         EmperorRequest_InitializationErrorRequest.es_TextFormat = (UBYTE *) Emperor_ExceptionString;
  1232.         EmperorRequest_InitializationErrorRequest.es_GadgetFormat = (UBYTE *) "Okay";
  1233.         EasyRequest(NULL, &EmperorRequest_InitializationErrorRequest, NULL, NULL);
  1234.         Emperor_QuitProgram();
  1235.     }
  1236.     else
  1237.     {
  1238.         SetProgramName("AminetSearcher");
  1239.     }
  1240. }
  1241.  
  1242. void Emperor_QuitProgram(void)
  1243. {
  1244.     Emperor_CloseWindow_Window1();
  1245.     if(WindowObject1) DisposeObject(WindowObject1);
  1246.     if(AppPort) DeleteMsgPort(AppPort);
  1247.     if(MsgPort) DeletePort(MsgPort);
  1248.     if(Menu) FreeMenus(Menu);
  1249.     if(Screen1) UnlockPubScreen(NULL, Screen1);
  1250.     if(Catalog) CloseCatalog(Catalog);
  1251.     if(LabelBase) CloseLibrary(LabelBase);
  1252.     if(GlyphBase) CloseLibrary(GlyphBase);
  1253.     if(BitMapBase) CloseLibrary(BitMapBase);
  1254.     if(BevelBase) CloseLibrary(BevelBase);
  1255.     if(TextEditorBase) CloseLibrary(TextEditorBase);
  1256.     if(TapeDeckBase) CloseLibrary(TapeDeckBase);
  1257.     if(StringBase) CloseLibrary(StringBase);
  1258.     if(SpeedBarBase) CloseLibrary(SpeedBarBase);
  1259.     if(SpaceBase) CloseLibrary(SpaceBase);
  1260.     if(SliderBase) CloseLibrary(SliderBase);
  1261.     if(ScrollerBase) CloseLibrary(ScrollerBase);
  1262.     if(RadioButtonBase) CloseLibrary(RadioButtonBase);
  1263.     if(PaletteBase) CloseLibrary(PaletteBase);
  1264.     if(ListBrowserBase) CloseLibrary(ListBrowserBase);
  1265.     if(LayoutBase) CloseLibrary(LayoutBase);
  1266.     if(IntegerBase) CloseLibrary(IntegerBase);
  1267.     if(GradientSliderBase) CloseLibrary(GradientSliderBase);
  1268.     if(GetScreenModeBase) CloseLibrary(GetScreenModeBase);
  1269.     if(GetFontBase) CloseLibrary(GetFontBase);
  1270.     if(GetFileBase) CloseLibrary(GetFileBase);
  1271.     if(FuelGaugeBase) CloseLibrary(FuelGaugeBase);
  1272.     if(DateBrowserBase) CloseLibrary(DateBrowserBase);
  1273.     if(ColorWheelBase) CloseLibrary(ColorWheelBase);
  1274.     if(ClickTabBase) CloseLibrary(ClickTabBase);
  1275.     if(ChooserBase) CloseLibrary(ChooserBase);
  1276.     if(CheckBoxBase) CloseLibrary(CheckBoxBase);
  1277.     if(ButtonBase) CloseLibrary(ButtonBase);
  1278.     if(RequesterBase) CloseLibrary(RequesterBase);
  1279.     if(WindowBase) CloseLibrary(WindowBase);
  1280.     if(ResourceBase) CloseLibrary(ResourceBase);
  1281.     if(DOSLibBase) CloseLibrary(DOSLibBase);
  1282.     if(ASLBase) CloseLibrary(ASLBase);
  1283.     if(GadToolsBase) CloseLibrary(GadToolsBase);
  1284.     if(LocaleBase) CloseLibrary(LocaleBase);
  1285.     if(IntuitionBase) CloseLibrary(IntuitionBase);
  1286.     exit(0);
  1287. }
  1288.  
  1289. void Emperor_CloseScreen_Screen1(void)
  1290. {
  1291.     if(Screen1)
  1292.     {
  1293.         UnlockPubScreen(NULL, Screen1);
  1294.         Screen1 = NULL;
  1295.     }
  1296. }
  1297.  
  1298. struct Screen *Emperor_OpenScreen_Screen1(void)
  1299. {
  1300.     Screen1 = LockPubScreen(NULL);
  1301.     return(Screen1);
  1302. }
  1303.  
  1304. void Emperor_CloseWindow_Window1(void)
  1305. {
  1306.     if(os35)
  1307.     {
  1308.         if(Menu) ClearMenuStrip(Window1);
  1309.         DoMethod(WindowObject1, WM_CLOSE, NULL);
  1310.         Window1 = NULL;
  1311.         WindowSignals1 = 0L;
  1312.     }
  1313. }
  1314.  
  1315. struct Window *Emperor_OpenWindow_Window1(void)
  1316. {
  1317.     if(os35)
  1318.     {
  1319.         Window1 = RA_OpenWindow(WindowObject1);
  1320.         GetAttr(WINDOW_SigMask, WindowObject1, &WindowSignals1);
  1321.         SetMenuStrip(Window1, Menu);
  1322.     }
  1323.     return(Window1);
  1324. }
  1325.  
  1326. STRPTR Emperor_GetGadgetAttr(struct Gadget *Emperor_GadgetName)
  1327. {
  1328.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1329.     STRPTR Emperor_GadgetAttrReturn = "";
  1330.  
  1331.     Emperor_GadgetAttrBuffer = 0L;
  1332.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 1023;Emperor_GadgetCounter++)
  1333.     {
  1334.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1335.         {
  1336.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1337.             {
  1338.                 case 0:
  1339.                     GetAttr(GA_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1340.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1341.                     break;
  1342.                 case 1:
  1343.                     GetAttr(GA_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1344.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1345.                     break;
  1346.                 case 2:
  1347.                     GetAttr(CHOOSER_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1348.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1349.                     break;
  1350.                 case 3:
  1351.                     GetAttr(CLICKTAB_Current, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1352.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1353.                     break;
  1354.                 case 6:
  1355.                     GetAttr(FUELGAUGE_Level, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1356.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1357.                     break;
  1358.                 case 7:
  1359.                     GetAttr(GETFILE_FullFile, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1360.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1361.                     break;
  1362.                 case 8:
  1363.                     GetAttr(GETFONT_TextAttr, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1364.                     Emperor_GadgetAttrReturn = (STRPTR) Emperor_GadgetAttrBuffer;
  1365.                     break;
  1366.                 case 9:
  1367.                     GetAttr(GETSCREENMODE_DisplayID, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1368.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1369.                     break;
  1370.                 case 10:
  1371.                     GetAttr(GRAD_CurVal, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1372.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1373.                     break;
  1374.                 case 11:
  1375.                     GetAttr(INTEGER_Number, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1376.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1377.                     break;
  1378.                 case 13:
  1379.                     GetAttr(LISTBROWSER_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1380.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1381.                     break;
  1382.                 case 14:
  1383.                     GetAttr(PALETTE_Colour, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1384.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1385.                     break;
  1386.                 case 15:
  1387.                     GetAttr(RADIOBUTTON_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1388.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1389.                     break;
  1390.                 case 16:
  1391.                     GetAttr(SCROLLER_Top, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1392.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1393.                     break;
  1394.                 case 17:
  1395.                     GetAttr(SLIDER_Level, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1396.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1397.                     break;
  1398.                 case 19:
  1399.                     GetAttr(SPEEDBAR_Selected, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1400.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1401.                     break;
  1402.                 case 20:
  1403.                     GetAttr(STRINGA_TextVal, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1404.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1405.                     break;
  1406.                 case 21:
  1407.                     GetAttr(TDECK_Mode, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1408.                     strcpy(Emperor_GadgetAttrReturn, inttostring(Emperor_GadgetAttrBuffer));
  1409.                     break;
  1410.                 case 22:
  1411.                     GetAttr(GA_TEXTEDITOR_Contents, Emperor_GadgetName, (ULONG *) &Emperor_GadgetAttrBuffer);
  1412.                     strcpy(Emperor_GadgetAttrReturn, (char *) Emperor_GadgetAttrBuffer);
  1413.                     break;
  1414.             }
  1415.             break;
  1416.         }
  1417.     }
  1418.     return(Emperor_GadgetAttrReturn);
  1419. }
  1420.  
  1421. void Emperor_SetGadgetAttr(struct Gadget *Emperor_GadgetName, STRPTR Emperor_GadgetValue)
  1422. {
  1423.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1424.     struct Window *Emperor_Whichwindow = NULL;
  1425.  
  1426.     Emperor_GadgetAttrBuffer = 0L;
  1427.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 1023;Emperor_GadgetCounter++)
  1428.     {
  1429.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1430.         {
  1431.             Emperor_Whichwindow = Window1;
  1432.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1433.             {
  1434.                 case 0:
  1435.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1436.                     break;
  1437.                 case 1:
  1438.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1439.                     break;
  1440.                 case 2:
  1441.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1442.                     break;
  1443.                 case 3:
  1444.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Current, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1445.                     break;
  1446.                 case 6:
  1447.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, FUELGAUGE_Level, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1448.                     break;
  1449.                 case 7:
  1450.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETFILE_FullFile, Emperor_GadgetValue, TAG_DONE);
  1451.                     break;
  1452.                 case 8:
  1453.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETFONT_TextAttr, (struct TextAttr *) &Emperor_GadgetValue, TAG_DONE);
  1454.                     break;
  1455.                 case 9:
  1456.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETSCREENMODE_DisplayID, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1457.                     break;
  1458.                 case 10:
  1459.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, INTEGER_Number, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1460.                     break;
  1461.                 case 11:
  1462.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GRAD_CurVal, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1463.                     break;
  1464.                 case 13:
  1465.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1466.                     break;
  1467.                 case 14:
  1468.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, PALETTE_Colour, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1469.                     break;
  1470.                 case 15:
  1471.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Selected, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1472.                     break;
  1473.                 case 16:
  1474.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SCROLLER_Top, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1475.                     break;
  1476.                 case 17:
  1477.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SLIDER_Level, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1478.                     break;
  1479.                 case 19:
  1480.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, SPEEDBAR_Selected, Emperor_GadgetValue, TAG_DONE);
  1481.                     break;
  1482.                 case 20:
  1483.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, STRINGA_TextVal, Emperor_GadgetValue, TAG_DONE);
  1484.                     break;
  1485.                 case 21:
  1486.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, TDECK_Mode, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1487.                     break;
  1488.                 case 22:
  1489.                     Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_TEXTEDITOR_Contents, Emperor_GadgetValue, TAG_DONE);
  1490.                     break;
  1491.             }
  1492.             if(Emperor_GadgetAttrBuffer) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1493.             break;
  1494.         }
  1495.     }
  1496. }
  1497.  
  1498. void Emperor_SetGadgetAttrComplex(struct Gadget *Emperor_GadgetName, ULONG Emperor_GadgetFlagMask, STRPTR Emperor_GadgetValue)
  1499. {
  1500.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1501.     struct Window *Emperor_Whichwindow = NULL;
  1502.  
  1503.     Emperor_GadgetAttrBuffer = 0L;
  1504.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1505.     {
  1506.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1507.         {
  1508.             Emperor_Whichwindow = Window1;
  1509.             switch(Emperor_Gadgetkind1[Emperor_GadgetCounter])
  1510.             {
  1511.                 case 0:
  1512.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1513.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1514.                     break;
  1515.                 case 1:
  1516.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1517.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1518.                     break;
  1519.                 case 2:
  1520.                     if(Emperor_GadgetFlagMask == CHOOSER_Title) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Title, Emperor_GadgetValue, TAG_DONE);
  1521.                     else
  1522.                     {
  1523.                         if(Emperor_GadgetFlagMask == CHOOSER_Labels)
  1524.                         {
  1525.                             SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Labels, (ULONG) ~0, TAG_DONE);
  1526.                             if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CHOOSER_Labels, Emperor_GadgetValue, TAG_DONE);
  1527.                             Emperor_GadgetAttrBuffer = 1;
  1528.                         }
  1529.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1530.                     }
  1531.                     break;
  1532.                 case 3:
  1533.                     if(Emperor_GadgetFlagMask == CLICKTAB_Labels)
  1534.                     {
  1535.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Labels, (ULONG) ~0, TAG_DONE);
  1536.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, CLICKTAB_Labels, Emperor_GadgetValue, TAG_DONE);
  1537.                         Emperor_GadgetAttrBuffer = 1;
  1538.                     }
  1539.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1540.                     break;
  1541.                 case 4:
  1542.                     if(Emperor_GadgetFlagMask == WHEEL_Abbrv) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, WHEEL_Abbrv, Emperor_GadgetValue, TAG_DONE);
  1543.                     else
  1544.                     {
  1545.                         if((Emperor_GadgetFlagMask == WHEEL_Red) || (Emperor_GadgetFlagMask == WHEEL_Green) || (Emperor_GadgetFlagMask == WHEEL_Blue) || (Emperor_GadgetFlagMask == WHEEL_Hue) || (Emperor_GadgetFlagMask == WHEEL_Saturation) || (Emperor_GadgetFlagMask == WHEEL_Brightness)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue) << 24, TAG_DONE);
  1546.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1547.                     }
  1548.                     break;
  1549.                 case 5:
  1550.                     if(Emperor_GadgetFlagMask == DATEBROWSER_DayTitles) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, DATEBROWSER_DayTitles, Emperor_GadgetValue, TAG_DONE);
  1551.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1552.                     break;
  1553.                 case 6:
  1554.                     if(Emperor_GadgetFlagMask == GA_Text) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Text, Emperor_GadgetValue, TAG_DONE);
  1555.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1556.                     break;
  1557.                 case 7:
  1558.                     if((Emperor_GadgetFlagMask == GETFILE_TitleText) || (Emperor_GadgetFlagMask == GETFILE_File) || (Emperor_GadgetFlagMask == GETFILE_Drawer) || (Emperor_GadgetFlagMask == GETFILE_FullFile) || (Emperor_GadgetFlagMask == GETFILE_Pattern) || (Emperor_GadgetFlagMask == GETFILE_AcceptPattern) || (Emperor_GadgetFlagMask == GETFILE_RejectPattern)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, Emperor_GadgetValue, TAG_DONE);
  1559.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1560.                     break;
  1561.                 case 8:
  1562.                     if(Emperor_GadgetFlagMask == GETFONT_TitleText) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETFONT_TitleText, Emperor_GadgetValue, TAG_DONE);
  1563.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1564.                     break;
  1565.                 case 9:
  1566.                     if(Emperor_GadgetFlagMask == GETSCREENMODE_TitleText) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GETSCREENMODE_TitleText, Emperor_GadgetValue, TAG_DONE);
  1567.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1568.                     break;
  1569.                 case 10: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1570.                 case 11: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1571.                 case 13:
  1572.                     if(Emperor_GadgetFlagMask == LISTBROWSER_Labels)
  1573.                     {
  1574.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Labels, (ULONG) ~0, TAG_DONE);
  1575.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_Labels, Emperor_GadgetValue, TAG_DONE);
  1576.                         Emperor_GadgetAttrBuffer = 1;
  1577.                     }
  1578.                     else
  1579.                     {
  1580.                         if(Emperor_GadgetFlagMask == LISTBROWSER_ColumnInfo)
  1581.                         {
  1582.                             SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_ColumnInfo, (ULONG) ~0, TAG_DONE);
  1583.                             if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, LISTBROWSER_ColumnInfo, Emperor_GadgetValue, TAG_DONE);
  1584.                             Emperor_GadgetAttrBuffer = 1;
  1585.                         }
  1586.                         else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1587.                     }
  1588.                     break;
  1589.                 case 14: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1590.                 case 15:
  1591.                     if(Emperor_GadgetFlagMask == RADIOBUTTON_Labels)
  1592.                     {
  1593.                         SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Labels, (ULONG) ~0, TAG_DONE);
  1594.                         if(Emperor_GadgetValue != NULL) SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, RADIOBUTTON_Labels, Emperor_GadgetValue, TAG_DONE);
  1595.                         Emperor_GadgetAttrBuffer = 1;
  1596.                     }
  1597.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1598.                     break;
  1599.                 case 16: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1600.                 case 17: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1601.                 case 18: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1602.                 case 19: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1603.                 case 20:
  1604.                     if((Emperor_GadgetFlagMask == STRINGA_TextVal) || (Emperor_GadgetFlagMask == STRINGA_Buffer) || (Emperor_GadgetFlagMask == STRINGA_UndoBuffer) || (Emperor_GadgetFlagMask == STRINGA_WorkBuffer)) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, Emperor_GadgetValue, TAG_DONE);
  1605.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1606.                     break;
  1607.                 case 21: Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE); break;
  1608.                 case 22:
  1609.                     if(Emperor_GadgetFlagMask == GA_TEXTEDITOR_Contents) Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_TEXTEDITOR_Contents, Emperor_GadgetValue, TAG_DONE);
  1610.                     else Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, Emperor_GadgetFlagMask, stringtoint(Emperor_GadgetValue), TAG_DONE);
  1611.                     break;
  1612.             }
  1613.             if(Emperor_GadgetAttrBuffer) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1614.             break;
  1615.         }
  1616.     }
  1617. }
  1618.  
  1619. void Emperor_SetGadgetDisabledAttr(struct Gadget *Emperor_GadgetName, BOOL Emperor_GadgetValue)
  1620. {
  1621.     LONG Emperor_GadgetAttrBuffer, Emperor_GadgetCounter;
  1622.     struct Window *Emperor_Whichwindow = NULL;
  1623.  
  1624.     Emperor_GadgetAttrBuffer = 0L;
  1625.     for(Emperor_GadgetCounter = 0;Emperor_GadgetCounter < 255;Emperor_GadgetCounter++)
  1626.     {
  1627.         if(Gadget1[Emperor_GadgetCounter] == Emperor_GadgetName)
  1628.         {
  1629.             Emperor_Whichwindow = Window1;
  1630.             Emperor_GadgetAttrBuffer = SetGadgetAttrs(Emperor_GadgetName, Emperor_Whichwindow, NULL, GA_Disabled, Emperor_GadgetValue, TAG_DONE);
  1631.             if(Emperor_GadgetAttrBuffer) RefreshGList(Emperor_GadgetName, Emperor_Whichwindow, NULL, 1);
  1632.             break;
  1633.         }
  1634.     }
  1635. }
  1636.  
  1637. void Emperor_AllocChooserNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1638. {
  1639.     WORD Emperor_Counter1 = 0;
  1640.     struct Node *Emperor_Node;
  1641.  
  1642.     if(os35)
  1643.     {
  1644.         NewList(Emperor_List);
  1645.         while(*Emperor_Labels)
  1646.         {
  1647.             Emperor_Node = AllocChooserNode(CNA_Text, *Emperor_Labels, CNA_Disabled, Emperor_Attributes[Emperor_Counter1], CNA_ReadOnly, Emperor_Attributes[Emperor_Counter1 + 1], TAG_DONE);
  1648.             AddTail(Emperor_List, Emperor_Node);
  1649.             Emperor_Labels++;
  1650.             Emperor_Counter1 += 12;
  1651.         }
  1652.     }
  1653. }
  1654.  
  1655. void Emperor_AllocClicktabNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1656. {
  1657.     WORD Emperor_Counter1 = 0, Emperor_Counter2 = 0;
  1658.     struct Node *Emperor_Node;
  1659.  
  1660.     if(os35)
  1661.     {
  1662.         NewList(Emperor_List);
  1663.         while(*Emperor_Labels)
  1664.         {
  1665.             Emperor_Node = AllocClickTabNode(TNA_Text, *Emperor_Labels, TNA_Disabled, Emperor_Attributes[Emperor_Counter1], TNA_Number, Emperor_Counter2, TAG_DONE);
  1666.             AddTail(Emperor_List, Emperor_Node);
  1667.             Emperor_Labels++;
  1668.             Emperor_Counter1 += 12;
  1669.             Emperor_Counter2++;
  1670.         }
  1671.     }
  1672. }
  1673.  
  1674. void Emperor_AllocListbrowserNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1675. {
  1676.     WORD Emperor_Counter1 = 0, Emperor_Counter2 = 0;
  1677.     struct Node *Emperor_Node;
  1678.  
  1679.     if(os35)
  1680.     {
  1681.         NewList(Emperor_List);
  1682.         while(*Emperor_Labels)
  1683.         {
  1684.             Emperor_Counter2 = 0;
  1685.             if(Emperor_Attributes[Emperor_Counter1 + 1]) Emperor_Counter2 += 1;
  1686.             if(Emperor_Attributes[Emperor_Counter1 + 2]) Emperor_Counter2 += 4;
  1687.             if(Emperor_Attributes[Emperor_Counter1 + 3]) Emperor_Counter2 += 8;
  1688.             if(Emperor_Attributes[Emperor_Counter1 + 4]) Emperor_Counter2 += 16;
  1689.             Emperor_Node = AllocListBrowserNode(1, LBNCA_Text, *Emperor_Labels, LBNCA_CopyText, TRUE, LBNA_Generation, Emperor_Attributes[Emperor_Counter1 + 10], LBNA_Column, Emperor_Attributes[Emperor_Counter1 + 11], LBNA_Flags, Emperor_Counter2, LBNA_Selected, Emperor_Attributes[Emperor_Counter1 + 5], LBNA_CheckBox, Emperor_Attributes[Emperor_Counter1 + 6], LBNA_Checked, Emperor_Attributes[Emperor_Counter1 + 7], TAG_DONE);
  1690.             AddTail(Emperor_List, Emperor_Node);
  1691.             Emperor_Labels++;
  1692.             Emperor_Counter1 += 12;
  1693.         }
  1694.     }
  1695. }
  1696.  
  1697. void Emperor_AllocRadiobuttonNode(struct List *Emperor_List, char **Emperor_Labels, WORD *Emperor_Attributes)
  1698. {
  1699.     struct Node *Emperor_Node;
  1700.  
  1701.     if(os35)
  1702.     {
  1703.         NewList(Emperor_List);
  1704.         while(*Emperor_Labels)
  1705.         {
  1706.             Emperor_Node = AllocRadioButtonNode(1, RBNA_Labels, *Emperor_Labels, TAG_DONE);
  1707.             AddTail(Emperor_List, Emperor_Node);
  1708.             Emperor_Labels++;
  1709.         }
  1710.     }
  1711. }
  1712.  
  1713. void Emperor_AllocListbrowserGadToolsNode(struct List *Emperor_List, char **Emperor_Labels)
  1714. {
  1715.     struct Node *Emperor_Node;
  1716.     struct Remember *Emperor_RememberKey;
  1717.  
  1718.     NewList(Emperor_List);
  1719.     while(*Emperor_Labels)
  1720.     {
  1721.         Emperor_Node = (struct Node *) AllocRemember(&Emperor_RememberKey, sizeof(struct Node), MEMF_CLEAR);
  1722.         Emperor_Node->ln_Name = *Emperor_Labels;
  1723.         AddTail(Emperor_List, Emperor_Node);
  1724.         Emperor_Labels++;
  1725.     }
  1726. }
  1727.  
  1728. ULONG stringlength(STRPTR Emperor_StringBuffer)
  1729. {
  1730.     ULONG Emperor_Counter = 0;
  1731.  
  1732.     while(Emperor_StringBuffer[Emperor_Counter] != NULL) Emperor_Counter++;
  1733.     return(Emperor_Counter);
  1734. }
  1735.  
  1736. LONG stringtoint(STRPTR Emperor_StringBuffer)
  1737. {
  1738.     return(atol(Emperor_StringBuffer));
  1739. }
  1740.  
  1741. DOUBLE stringtofloat(STRPTR Emperor_StringBuffer)
  1742. {
  1743.     return(atof(Emperor_StringBuffer));
  1744. }
  1745.  
  1746. #include <math.h>
  1747.  
  1748. STRPTR inttostring(LONG Emperor_IntegerInput)
  1749. {
  1750.     char *Emperor_StringOutput = "abcdefghijk";
  1751.     STRPTR Emperor_StringBegin;
  1752.     BYTE Emperor_Counter, Emperor_IntegerLength = 0;
  1753.     LONG buffer;
  1754.  
  1755.     strcpy(Emperor_StringOutput, "");
  1756.     Emperor_StringBegin = Emperor_StringOutput;
  1757.     if(Emperor_IntegerInput < 0)
  1758.     {
  1759.         *Emperor_StringOutput++ = '-';
  1760.         Emperor_IntegerInput = -Emperor_IntegerInput;
  1761.     }
  1762.     buffer = Emperor_IntegerInput;
  1763.     do
  1764.     {
  1765.         buffer = buffer / 10;
  1766.         Emperor_IntegerLength++;
  1767.     }
  1768.     while(buffer > 0);
  1769.     for(Emperor_Counter = 1;Emperor_Counter <= Emperor_IntegerLength;Emperor_Counter++)
  1770.     {
  1771.         buffer = (LONG) (Emperor_IntegerInput / (LONG) pow(10, Emperor_IntegerLength - Emperor_Counter));
  1772.         Emperor_IntegerInput -= buffer * (LONG) pow(10, Emperor_IntegerLength - Emperor_Counter);
  1773.         *Emperor_StringOutput++ = (char) (buffer + 48);
  1774.     }
  1775.     *Emperor_StringOutput = NULL;
  1776.     Emperor_StringOutput = Emperor_StringBegin;
  1777.     return(Emperor_StringOutput)
  1778. }
  1779. #include <AminetSearcher.h>
  1780.